home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
MacHack 1996
/
MacHack 1996.toast
/
Presentations
/
Presentations ’94
/
Timothy Knox
/
Help
/
Help Files
/
Constraints
/
Donald+Gerald
< prev
next >
Wrap
Text File
|
1994-06-24
|
1KB
|
49 lines
;DONALD+GERALD=ROBERT
(c)
;;; Variables
(r0 d t r1 l r r2 e a r3 b n r4 o g)
;;; Constraints
((=? (+ d d)(+ t (* 10 r0)))
(=? (+ l (+ l r0))(+ r (* 10 r1)))
(=? (+ a (+ a r1))(+ e (* 10 r2)))
(=? (+ n (+ r r2))(+ b (* 10 r3)))
(=? (+ o (+ e r3))(+ o (* 10 r4)))
(=? r (+ d (+ g r4)))
(<>? d 0) (<>? g 0) (<>? r 0)
(<>? d o) (<>? d n) (<>? d a)
(<>? d l) (<>? d g) (<>? d e)
(<>? d r) (<>? d b) (<>? d t)
(<>? o n) (<>? o a) (<>? o l)
(<>? o g) (<>? o e) (<>? o r)
(<>? o b) (<>? o t) (<>? n a)
(<>? n l) (<>? n g) (<>? n e)
(<>? n r) (<>? n b) (<>? n t)
(<>? a l) (<>? a g) (<>? a e)
(<>? a r) (<>? a b) (<>? a t)
(<>? l g) (<>? l e) (<>? l r)
(<>? l b) (<>? l t) (<>? g e)
(<>? g r) (<>? g b) (<>? g t)
(<>? e r) (<>? e b) (<>? e t)
(<>? r b) (<>? r t) (<>? b t))
;;; Domains
((0 1)
(0 1 2 3 4 5 6 7 8 9)
(0 1 2 3 4 5 6 7 8 9)
(0 1)
(0 1 2 3 4 5 6 7 8 9)
(0 1 2 3 4 5 6 7 8 9)
(0 1)
(0 1 2 3 4 5 6 7 8 9)
(0 1 2 3 4 5 6 7 8 9)
(0 1)
(0 1 2 3 4 5 6 7 8 9)
(0 1 2 3 4 5 6 7 8 9)
(0 1)
(0 1 2 3 4 5 6 7 8 9)
(0 1 2 3 4 5 6 7 8 9))